home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / program / ddj0897.zip / DYN401.ZIP / class / const.c < prev    next >
C/C++ Source or Header  |  1997-04-16  |  1KB  |  82 lines
  1.  
  2.  
  3. /*  Copyright (c) 1993-1996 Algorithms Corporation  */
  4. /*  All rights reserved.  */
  5.  
  6.  
  7.  
  8.  
  9. /*  This file automatically generated by dpp - do not edit  */
  10.  
  11. #define    DPP_STRATEGY    2
  12. #define    DPP_FASTWIDE    0
  13.  
  14.  
  15.  
  16.  
  17. #define    CLASS    Constant_c
  18. #define    ivType    Constant_iv_t
  19.  
  20. #include "generics.h"
  21.  
  22. object    Constant_c;
  23.  
  24.  
  25.  
  26. #line 21 "const.d"
  27. imeth objrtn Constant_im_gDispose(object self)
  28. { 
  29.  
  30.     return self; 
  31. } 
  32.  
  33. imeth objrtn Constant_im_gCopy(object self)
  34. { 
  35.     return self; 
  36. } 
  37.  
  38. imeth int Constant_im_gEqual(object self, object obj)
  39. { 
  40.     return self == obj; 
  41. } 
  42.  
  43.  
  44. #line 45 "const.c"
  45.  
  46. objrtn    Constant_initialize(void)
  47. {
  48.     static  CRITICALSECTION  cs;
  49.     static  int volatile once = 0;
  50.  
  51.     ENTERCRITICALSECTION(_CI_CS_);
  52.     if (!once) {
  53.         INITIALIZECRITICALSECTION(cs);
  54.         once = 1;
  55.     }
  56.     LEAVECRITICALSECTION(_CI_CS_);
  57.  
  58.     ENTERCRITICALSECTION(cs);
  59.  
  60.     if (Constant_c) {
  61.         LEAVECRITICALSECTION(cs);
  62.         return Constant_c;
  63.     }
  64.     INHIBIT_THREADER;
  65.     Constant_c = gNewClass(Class, "Constant", 0, 0, END);
  66.     iMethodFor(Constant, gDispose, Constant_im_gDispose);
  67.     iMethodFor(Constant, gEqual, Constant_im_gEqual);
  68.     iMethodFor(Constant, gGCDispose, Constant_im_gDispose);
  69.     iMethodFor(Constant, gCopy, Constant_im_gCopy);
  70.     iMethodFor(Constant, gDeepDispose, Constant_im_gDispose);
  71.     iMethodFor(Constant, gDeepCopy, Constant_im_gCopy);
  72.  
  73.     ENABLE_THREADER;
  74.  
  75.     LEAVECRITICALSECTION(cs);
  76.  
  77.     return Constant_c;
  78. }
  79.  
  80.  
  81.  
  82.